Fix do-auto-fill thinko introduced earlier today

* lisp/simple.el (do-auto-fill): `current-fill-column' returns nil
to signal that we should fill.

diff --git a/lisp/simple.el b/lisp/simple.el
index ee2698dc674600c8093429495b08a6bf882cb0a0..1a49fe24252da670d5a790423c41a625967f573c 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -8057,7 +8057,7 @@ Returns t if it really did any work."
   (let (fc justify give-up
           (fill-prefix fill-prefix))
     (if (or (not (setq justify (current-justification)))
-           (setq fc (current-fill-column))
+           (null (setq fc (current-fill-column)))
            (and (eq justify 'left)
                 (<= (current-column) fc))
            (and auto-fill-inhibit-regexp